home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 4 / PC World Interactive 4.iso / share / internet / death / _SETUP.1 / popups.ini < prev    next >
INI File  |  1997-09-14  |  37KB  |  855 lines
  1. [mpopup]
  2. n0=X-cise's Homepage:/me is using 4 dEATH ThrustPACK 3.1 (⌐1997 By X-cise)... 4Download from : http://www.bordata.com.tr/ImaginE
  3. n1=-
  4. n2=dEATHFlood Protection
  5. n3=.All Protection
  6. n4=..High:/set %Var.F1 1 | /f1
  7. n5=..Normal:/set %Var.F1 2 | /f1
  8. n6=..Off:/set %Var.F1 3 | /f1
  9. n7=.-
  10. n8=.CTCP Protection
  11. n9=..High:/set %Var.F2 1 | /f2
  12. n10=..Normal:/set %Var.F2 2 | /f2
  13. n11=..Off:/set %Var.F2 3 | /f2
  14. n12=.Text Protection
  15. n13=..High:/set %Var.F3 1 | /f3
  16. n14=..Normal:/set %Var.F3 2 | /f3
  17. n15=..Off:/set %Var.F3 3 | /f3
  18. n16=.DCC Protection
  19. n17=..On:/set %Var.F4 1 | /f4
  20. n18=..Off:/set %Var.F4 2 | /f4
  21. n19=-
  22. n20=COMMANDERS
  23. n21=.CHANNEL MODE COMMANDER
  24. n22=..Set optional modes and topic:/topic # $$?="Enter your topic here:" | /mode # + $$?="Enter your modes here (TNPSIM):"
  25. n23=..Private
  26. n24=...On:/mode # +p
  27. n25=...Off:/mode # -p
  28. n26=..Invite only
  29. n27=...On:/mode # +i
  30. n28=...Off:/mode # -i
  31. n29=..Moderated
  32. n30=...On:/mode # +m
  33. n31=...Off:/mode # -m
  34. n32=..Secret
  35. n33=...On:/mode # +s
  36. n34=...Off:/mode # -s
  37. n35=..Limit numbers
  38. n36=...On:/mode # +l $$?="Enter number of users allowed:"
  39. n37=...Off:/mode # -l
  40. n38=..Key protection
  41. n39=...On:/mode # +k $$?="Enter channel key:"
  42. n40=...Off:/mode # -k $$?="Enter key to remove:"
  43. n41=..Prevent topic changes for non-ops
  44. n42=...On:/mode # +t
  45. n43=...Off:/mode # -t
  46. n44=..Prevent external messages
  47. n45=...On:/mode # +n
  48. n46=...Off:/mode # -n
  49. n47=.YOUR MODE COMMANDER
  50. n48=..Server Notices
  51. n49=...On:/mode $me +s | /speak Done Sir
  52. n50=...Off:/mode $me -s | /speak Done Sir
  53. n51=..Invisibility
  54. n52=...On:/mode $me +i | /speak Done Sir
  55. n53=...Off:/mode $me -i | /speak Done Sir
  56. n54=..Wallops
  57. n55=...On:/mode $me +w | /speak Done Sir
  58. n56=...Off:/mode $me -w | /speak Done Sir
  59. n57=-
  60. n58=Fake ChanJoin:/join $$?="What channel?" $+ á $+
  61. n59=About IRCServer
  62. n60=.MOTD:/motd
  63. n61=.Lusers:/lusers
  64. n62=.IRCops:/stats o
  65. n63=.Admin:/admin
  66. n64=.K-Lines:/stats k
  67. n65=.G-Lines:/stats g
  68. n66=-
  69. n67=Talkers
  70. n68=.SMaLL CaSe:/leet $$?="Enter Text"
  71. n69=.UppEr cAsE:/upvowels $$?="Enter Text"
  72. n70=.Backdraws:/backwards $$?="Enter Text"
  73. n71=.rAndOmáCAPS:/rcaps $$?="Enter Text"
  74. n72=.*s*t*a*r*s*:/stars $$?="Enter Text"
  75. n73=.dEATHTalker:/kewltalk $$?="Enter Text"
  76. n74=.-
  77. n75=.dEATHCoder
  78. n76=..@ Coding:/codea $$?="Enter the text that will be coded"
  79. n77=..Θ Coding:/codee $$?="Enter the text that will be coded"
  80. n78=.dEATHUncoder
  81. n79=..@ Uncoding:/ucodema $$?="Enter the text that will be uncoded"
  82. n80=..Θ Uncoding:/ucodeme $$?="Enter the text that will be uncoded"
  83. n81=-
  84. n82=Nick Registration (if available)
  85. n83=.Setup Protection
  86. n84=..Setup All:/sall
  87. n85=..-
  88. n86=..Register Me:/register_me
  89. n87=..-
  90. n88=..Nick of Bot:/nickbot
  91. n89=..Prot. nick:/protnick
  92. n90=..Password:/passw
  93. n91=..-
  94. n92=..Delete My Prot:/delprot
  95. n93=.-
  96. n94=.Register Me:/register_me
  97. n95=.-
  98. n96=.Recover My Nick:/recovern
  99. n97=.Release My Nick:/releasen
  100. n98=.-
  101. n99=.Identify:/ident
  102.  
  103. [cpopup]
  104. n0=X-cise's Homepage:/me is using 4 dEATH ThrustPACK 3.1 (⌐1997 By X-cise)... 4Download from : http://www.bordata.com.tr/ImaginE
  105. n1=-
  106. n2=dEATHFlood Protection
  107. n3=.All Protection
  108. n4=..High:/set %Var.F1 1 | /f1
  109. n5=..Normal:/set %Var.F1 2 | /f1
  110. n6=..Off:/set %Var.F1 3 | /f1
  111. n7=.-
  112. n8=.CTCP Protection
  113. n9=..High:/set %Var.F2 1 | /f2
  114. n10=..Normal:/set %Var.F2 2 | /f2
  115. n11=..Off:/set %Var.F2 3 | /f2
  116. n12=.Text Protection
  117. n13=..High:/set %Var.F3 1 | /f3
  118. n14=..Normal:/set %Var.F3 2 | /f3
  119. n15=..Off:/set %Var.F3 3 | /f3
  120. n16=.DCC Protection
  121. n17=..On:/set %Var.F4 1 | /f4
  122. n18=..Off:/set %Var.F4 2 | /f4
  123. n19=-
  124. n20=Takeover Channel
  125. n21=.Takeover: {
  126. n22=  if ($me isop #) { /md -t }
  127. n23=  else { echo 6 You must have ops to do this! }
  128. n24=}
  129. n25=.Takeover (safe): {
  130. n26=  if ($me isop #) { /md -ts $$?="Nick to Protect" }
  131. n27=  else { echo 6 You must have ops to do this! }
  132. n28=}
  133. n29=-
  134. n30=About IRCServer
  135. n31=.MOTD:/motd
  136. n32=.Lusers:/lusers
  137. n33=.IRCops:/stats o
  138. n34=.Admin:/admin
  139. n35=.K-Lines:/stats k
  140. n36=.G-Lines:/stats g
  141. n37=Away Options
  142. n38=.On:{
  143. n39=  if %away == ON { echo 4 Cannot set away.  You're already away! | halt }
  144. n40=  /ame 4dEATH ThrustPACK 33 $me is now away! 1>>3 $$?="Enter Your Message Here" 1<<3 Timer: ON  Record: ON  Stuff: ON   /ctcp %awaynick stuff to see what you can do. 4dEATH ThrustPACK 3
  145. n41=  /timer997 0 800 /ame 4dEATH ThrustPACK 33  $me is away. 1╗3 $! 1½3 /ctcp %awaynick stuff to see what you can do. 5 Messages are logged. 5 4dEATH ThrustPACK 3
  146. n42=  /set %awayminutes 0
  147. n43=  /set %awayhours 0
  148. n44=  /set %awaysecs 0
  149. n45=  /timer50 0 1 /incawaysecs
  150. n46=  /timer51 0 60 /incawayminutes
  151. n47=  /timer52 0 3600 /incawayhours
  152. n48=  /set %awaysince $fulldate
  153. n49=  /enable #away
  154. n50=  echo 4 You have been marked as being away.  If somebody sends you a /msg, it records it.  The pager, tracker, etc. are on.  Your nick is %awaynick $+ .
  155. n51=  /set %away YES
  156. n52=  /away I'm away: 4╗ $! ½1  /ctcp $me stuff to see what you can do.
  157. n53=}
  158. n54=.Off:/ame 4dEATH ThrustPACK33 $me is back.  Away for %awayhours hours, %awayminutes minutes and %awaysecs seconds. 4dEATH ThrustPACK 3 | /timer997 off | /timer50 off | /timer51 off | /timer52 off | /disable #away | /unset %awaysince | /set %away NO | /away | echo 4 You have marked as no longer being away.  All the away features (tracker, timer, pager) are now off.
  159. n55=-
  160. n56=COMMANDERS
  161. n57=.CHANNEL MODE COMMANDER
  162. n58=..Set optional modes and topic:/topic # $$?="Enter your topic here:" | /mode # + $$?="Enter your modes here (TNPSIM):"
  163. n59=..Private
  164. n60=...On:/mode # +p
  165. n61=...Off:/mode # -p
  166. n62=..Invite only
  167. n63=...On:/mode # +i
  168. n64=...Off:/mode # -i
  169. n65=..Moderated
  170. n66=...On:/mode # +m
  171. n67=...Off:/mode # -m
  172. n68=..Secret
  173. n69=...On:/mode # +s
  174. n70=...Off:/mode # -s
  175. n71=..Limit numbers
  176. n72=...On:/mode # +l $$?="Enter number of users allowed:"
  177. n73=...Off:/mode # -l
  178. n74=..Key protection
  179. n75=...On:/mode # +k $$?="Enter channel key:"
  180. n76=...Off:/mode # -k $$?="Enter key to remove:"
  181. n77=..Prevent topic changes for non-ops
  182. n78=...On:/mode # +t
  183. n79=...Off:/mode # -t
  184. n80=..Prevent external messages
  185. n81=...On:/mode # +n
  186. n82=...Off:/mode # -n
  187. n83=.YOUR MODE COMMANDER
  188. n84=..Server Notices
  189. n85=...On:/mode $me +s | /speak Done Sir
  190. n86=...Off:/mode $me -s | /speak Done Sir
  191. n87=..Invisibility
  192. n88=...On:/mode $me +i | /speak Done Sir
  193. n89=...Off:/mode $me -i | /speak Done Sir
  194. n90=..Wallops
  195. n91=...On:/mode $me +w | /speak Done Sir
  196. n92=...Off:/mode $me -w | /speak Done Sir
  197. n93=Fake ChanJoin:/join $$?="What channel?" $+ á $+
  198. n94=Mass Utilities
  199. n95=.Mass Op: {
  200. n96=  set %i 1
  201. n97=  set %Var.Index 1
  202. n98=  unset %Var.Nicks
  203. n99=  unset %Var.Snick
  204. n100=  if (undernet isin $server) { set %Var.Num 6 }
  205. n101=  else { set %Var.Num 4 }
  206. n102=  :start
  207. n103=  if ($snick(%i,#) == $me) { inc %i 1 | goto start }
  208. n104=  set %Var.Snick $snick(%i,#)
  209. n105=  if (%Var.Snick == $null) { raw -q mode # +oooooo %Var.Nicks | unset %Var.Snick | unset %Var.Index | unset %Var.Nicks | unset %i | unset %Var.Num | halt }
  210. n106=  set %Var.Nicks %Var.Snick %Var.Nicks
  211. n107=  if (%Var.Snick != $me) { if (%Var.Index == %Var.Num) { raw -q mode # +oooooo %Var.Nicks | unset %Var.Nicks | set %Var.Index 1 | inc %i 1 | goto start } }
  212. n108=  inc %i 1 
  213. n109=  inc %Var.Index 1
  214. n110=  goto start
  215. n111=}
  216. n112=.Mass Deop: {
  217. n113=  set %i 1
  218. n114=  set %Var.Index 1
  219. n115=  unset %Var.Nicks
  220. n116=  unset %Var.Snick
  221. n117=  if (undernet isin $server) { set %Var.Num 6 }
  222. n118=  else { set %Var.Num 4 }
  223. n119=  :start
  224. n120=  if ($snick(%i,#) == $me) { inc %i 1 | goto start }
  225. n121=  set %Var.Snick $snick(%i,#)
  226. n122=  if (%Var.Snick == $null) { raw -q mode # -oooooo %Var.Nicks | unset %Var.Snick | unset %Var.Index | unset %Var.Nicks | unset %i | unset %Var.Num | halt }
  227. n123=  set %Var.Nicks %Var.Snick %Var.Nicks
  228. n124=  if (%Var.Snick != $me) { if (%Var.Index == %Var.Num) { raw -q mode # -oooooo %Var.Nicks | unset %Var.Nicks | set %Var.Index 1 | inc %i 1 | goto start } }
  229. n125=  inc %i 1 
  230. n126=  inc %Var.Index 1
  231. n127=  goto start
  232. n128=}
  233. n129=.Mass Voice: {
  234. n130=  set %i 1
  235. n131=  set %Var.Index 1
  236. n132=  unset %Var.Nicks
  237. n133=  unset %Var.Snick
  238. n134=  if (undernet isin $server) { set %Var.Num 6 }
  239. n135=  else { set %Var.Num 4 }
  240. n136=  :start
  241. n137=  set %Var.Snick $snick(%i,#)
  242. n138=  if (%Var.Snick == $null) { raw -q mode # +vvvvvv %Var.Nicks | unset %Var.Snick | unset %Var.Index | unset %Var.Nicks | unset %i | unset %Var.Num | halt }
  243. n139=  set %Var.Nicks %Var.Snick %Var.Nicks
  244. n140=  if (%Var.Index == %Var.Num) { raw -q mode # +vvvvvv %Var.Nicks | unset %Var.Nicks | set %Var.Index 1 | inc %i 1 | goto start } 
  245. n141=  inc %i 1 
  246. n142=  inc %Var.Index 1
  247. n143=  goto start
  248. n144=}
  249. n145=.Mass Devoice: {
  250. n146=  set %i 1
  251. n147=  set %Var.Index 1
  252. n148=  unset %Var.Nicks
  253. n149=  unset %Var.Snick
  254. n150=  if (undernet isin $server) { set %Var.Num 6 }
  255. n151=  else { set %Var.Num 4 }
  256. n152=  :start
  257. n153=  set %Var.Snick $snick(%i,#)
  258. n154=  if (%Var.Snick == $null) { raw -q mode # -vvvvvv %Var.Nicks | unset %Var.Snick | unset %Var.Index | unset %Var.Nicks | unset %i | unset %Var.Num | halt }
  259. n155=  set %Var.Nicks %Var.Snick %Var.Nicks
  260. n156=  if (%Var.Index == %Var.Num) { raw -q mode # -vvvvvv %Var.Nicks | unset %Var.Nicks | set %Var.Index 1 | inc %i 1 | goto start } 
  261. n157=  inc %i 1 
  262. n158=  inc %Var.Index 1
  263. n159=  goto start
  264. n160=}
  265. n161=.Mass Ban:/ban $$* 3
  266. n162=.Mass Kick: {
  267. n163=  set %i 1
  268. n164=  set %Var.Index 1
  269. n165=  :start
  270. n166=  set %Var.Nick $snick(%i,#)
  271. n167=  if (%Var.Nick == $null) { unset %i | unset %Var.Index | unset %Var.Nick | halt }
  272. n168=  if (%Var.Nick == $me) { inc %i 1 | goto start } 
  273. n169=  kick # %Var.Nick Mass Consequitive Wh0re Kick! Wh0re Number: %Var.Index
  274. n170=  inc %i 1 | inc %Var.Index 1
  275. n171=  goto start
  276. n172=}
  277. n173=.Mass Invite:/invite $$* $$?="Enter the channel that you wish to invite them too"
  278. n174=.Mass Notice:/notice $$* $$?="Enter your notice"
  279. n175=.Mass Msg:/msg $$* $$?="Enter your msg"
  280. n176=.NickMDeop:/nick _ $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) | /mode # -oooo $$1 $2 $3 $4 | /nick _ $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) | /mode # -oooo $5 $6 $7 $8 | /nick _ $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) | /mode # -oooo $9 $10 $11 $12 | /nick _ $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) | /mode # -oooo $13 $14 $15 $16
  281. n177=Talkers
  282. n178=.SMaLL CaSe:/leet $$?="Enter Text"
  283. n179=.UppEr cAsE:/upvowels $$?="Enter Text"
  284. n180=.Backdraws:/backwards $$?="Enter Text"
  285. n181=.rAndOmáCAPS:/rcaps $$?="Enter Text"
  286. n182=.*s*t*a*r*s*:/stars $$?="Enter Text"
  287. n183=.dEATHTalker:/kewltalk $$?="Enter Text"
  288. n184=.-
  289. n185=.dEATHCoder
  290. n186=..@ Coding:/codea $$?="Enter the text that will be coded"
  291. n187=..Θ Coding:/codee $$?="Enter the text that will be coded"
  292. n188=.dEATHUncoder
  293. n189=..@ Uncoding:/ucodema $$?="Enter the text that will be uncoded"
  294. n190=..Θ Uncoding:/ucodeme $$?="Enter the text that will be uncoded"
  295. n191=-
  296. n192=dEATHChannel Scan & Prot.
  297. n193=.dEATHChan Scan
  298. n194=..Channel Stats:/chanstats -e
  299. n195=..-
  300. n196=..IP Scan:/ipscan $$?="String to search for?"
  301. n197=..Clones:/clones
  302. n198=..-
  303. n199=..Channel IRCop Scan:/ircopscan -c
  304. n200=..Global IRCop Scan:/ircopscan -g
  305. n201=.dEATHChan Protect
  306. n202=..Clone Protection
  307. n203=...On:/set %Group.Clones On | set %Var.MaxClones $$?="Number Of Clones for Ban (like 3)" | echo 4 -a Kick/Ban Clones 1 òOn, %Var.MaxClones ò  4 (dEATH ThrustPACK 3.1)
  308. n204=...Off:/set %Group.Clones Off | echo 4 -a Kick/Ban Clones 1 òOffò  4 (dEATH ThrustPACK 3.1)
  309. n205=..Flooder Kick
  310. n206=...Kick:/set %Group.AutoFk On | set %Group.AutoFkb Off | echo 4 -a Auto Kick Flooders 1 òOnò  4 (dEATH ThrustPACK 3.1)
  311. n207=...Ban:/set %Group.AutoFk Off | set %Group.AutoFkb On | echo 4 -a Auto Ban Flooders 1 òOnò  4 (dEATH ThrustPACK 3.1)
  312. n208=...Off:/set %Group.AutoFk Off | set %Group.AutoFkb Off | echo 4 -a Auto Kick or Ban Flooders 1 òOffò  4 (dEATH ThrustPACK 3.1)
  313. n209=..-
  314. n210=..Netsplit Protection
  315. n211=...On:/set %Group.ProtSplit On | echo 4 -a Netsplit Protection 1 òOnò  4 (dEATH ThrustPACK 3.1)
  316. n212=...Off:/set %Group.ProtSplit Off | echo 4 -a Netsplit Protection 1 òOffò  4 (dEATH ThrustPACK 3.1)
  317. n213=..Desynch Protection
  318. n214=...On:/set %Group.MassDesynch On | echo 4 -a Desynch Protection 1 òOnò  4 (dEATH ThrustPACK 3.1)
  319. n215=...Off:/set %Group.MassDesynch Off | echo 4 -a Desynch Protection 1 òOffò  4 (dEATH ThrustPACK 3.1)
  320. n216=..-
  321. n217=..Mass Deop Protection
  322. n218=...On:/set %Group.MassDeop On | echo 4 -a Mass Deop Protection 1 òOnò  4 (dEATH ThrustPACK 3.1)
  323. n219=...Off:/set %Group.MassDeop Off | echo 4 -a Mass Deop Protection 1 òOffò  4 (dEATH ThrustPACK 3.1)
  324. n220=..Mass Ban Protection
  325. n221=...On:/set %Group.MassBan On | echo 4 -a Mass Ban Protection 1 òOnò  4 (dEATH ThrustPACK 3.1)
  326. n222=...Off:/set %Group.MassBan Off | echo 4 -a Mass Ban Protection 1 òOffò  4 (dEATH ThrustPACK 3.1)
  327. n223=..Mass Kick Protection
  328. n224=...On:/set %Group.MassKick On | echo 4 -a Mass Kick Protection 1 òOnò  4 (dEATH ThrustPACK 3.1)
  329. n225=...Off:/set %Group.MassKick Off | echo 4 -a Mass Kick Protection 1 òOffò  4 (dEATH ThrustPACK 3.1)
  330. n226=..-
  331. n227=..Topic Protection
  332. n228=...On:/set %Group.Topic On | /set %Var.Topic $$?="Topic to Protect:" | /set %Var.ChanTopic # | /topic # $$! | echo 4 -a Topic Protection 1 òOnò  4 (dEATH ThrustPACK 3.1)
  333. n229=...Off:/set %Group.Topic Off | echo 4 -a Topic Protection 1 òOffò  4 (dEATH ThrustPACK 3.1)
  334. n230=Filter Kicks
  335. n231=.Address/IP:/fk -i
  336. n232=.Clones Kick:/fk -c
  337. n233=.-
  338. n234=.Ops (except me): {
  339. n235=  set %Filter.Ban $yesno(Ban also) | set %Var.Index 1
  340. n236=  :filter
  341. n237=  set %Var.Temp [ $opnick(%Var.Index,#) ]
  342. n238=  if ([ %Var.Temp ] == $null) { goto end }
  343. n239=  if ([ %Var.Temp ] == [ $me ]) { inc %Var.Index | goto filter }
  344. n240=  if ([ %Filter.Ban ] == 1) { mode # +b [ $address(%Var.Temp,3) ] }
  345. n241=  kick # [ %Var.Temp ] dEATH Filter Kick (Ops | inc %Var.Index | goto filter
  346. n242=  :end
  347. n243=  dec %Var.Index | unset %Filter.*
  348. n244=  echo 4 # Op Filter Kick Complete 1 ò $+ [ %Var.Index ] $+ ò  4 (dEATH ThrustPACK 3.1)
  349. n245=}
  350. n246=.Non-Ops: {
  351. n247=  set %Filter.Ban $yesno(Ban also) | set %Var.Index 1
  352. n248=  :filter
  353. n249=  set %Var.Temp [ $nopnick(%Var.Index,#) ]
  354. n250=  if ([ %Var.Temp ] == $null) { goto end }
  355. n251=  if ([ %Filter.Ban ] == 1) { mode # +b [ $address(%Var.Temp,3) ] }
  356. n252=  kick # [ %Var.Temp ] dEATH Filter Kick (NonOps | inc %Var.Index | goto filter
  357. n253=  :end
  358. n254=  dec %Var.Index | unset %Filter.*
  359. n255=  echo 4 # NonOp Filter Kick Complete 1 ò $+ [ %Var.Index ] $+ ò  4 (dEATH ThrustPACK 3.1)
  360. n256=}
  361. n257=.-
  362. n258=.Away: {
  363. n259=  if ($yesno(Include Ops in filter) == 0) { set %Filter.Ops No }
  364. n260=  if ($yesno(Ban also) == 1) { set %Filer.Ban Yes }
  365. n261=  set %Filter.Away Yes | .enable #Filter.Channel | who #
  366. n262=}
  367. n263=.Non-Away: {
  368. n264=  if ($yesno(Include Ops in filter) == 0) { set %Filter.Ops No }
  369. n265=  if ($yesno(Ban also) == 1) { set %Filer.Ban Yes }
  370. n266=  set %Filter.NonAway Yes | .enable #Filter.Channel | who #
  371. n267=}
  372. n268=.-
  373. n269=.IRCops: {
  374. n270=  if ($yesno(Include Ops in filter) == 0) { set %Filter.Ops No }
  375. n271=  if ($yesno(Ban also) == 1) { set %Filer.Ban Yes }
  376. n272=  set %Filter.IRCops Yes | .enable #Filter.Channel | who #
  377. n273=}
  378. n274=dEATHSynch
  379. n275=.Desynch Channel 1:/desync1 | /.timer 1 10 /desync2 | /.timer 1 20 /desync1 | /.timer 1 30 /bb | /.timer 1 40 /bb | /.timer 1 50 /desync2 | /echo 6 # Now Running Desync for Next 60 Seconds.
  380. n276=.Desynch Channel 2:/mode # +bbbb *!-!*@*-<*>-<*>-<*>-<*>-<*>-<*> *!666@* *!555@* *!444@* | /mode # +bbbb *!333@* *!222@* *!111@* *!000@* | /mode # +bbbb *!=<*>=@*-*-*-*-*-*----*> *!*010@* *!*020@* *!*030@* | /mode # +bbbb *!*040@* *!*050@* *!*060@* *!*070@* | /mode # +bbbb *!*080@* *!*090@* *!*011@* *!*022@* *!*033@* | /mode # +bbbb *!0@* *!1@* *!2@* *!3@* | /mode # +bbbb *!4@* *!5@* *!6@* *!7@* | /mode # +stinkl  9999999999 | /topic # 4dEATH DeSynch completed
  381. n277=.Bogus Bans:/.timer 3 5 /bb | echo 4 Bogus Ban flooding # $+ !
  382. n278=-
  383. n279=Nick Registration (if available)
  384. n280=.Setup Protection
  385. n281=..Setup All:/sall
  386. n282=..-
  387. n283=..Nick of Bot:/nickbot
  388. n284=..Prot. nick:/protnick
  389. n285=..Password:/passw
  390. n286=..-
  391. n287=..Delete My Prot:/delprot
  392. n288=.-
  393. n289=.Register Me:/register_me
  394. n290=.-
  395. n291=.Recover My Nick:/recovern
  396. n292=.Release My Nick:/releasen
  397. n293=.-
  398. n294=.Identify:/ident
  399.  
  400. [qpopup]
  401. n0=X-cise's Homepage:/me is using 4 dEATH ThrustPACK 3.1 (⌐1997 By X-cise)... 4Download from : http://www.bordata.com.tr/ImaginE
  402. n1=-
  403. n2=dEATHFlood Protection
  404. n3=.All Protection
  405. n4=..High:/set %Var.F1 1 | /f1
  406. n5=..Normal:/set %Var.F1 2 | /f1
  407. n6=..Off:/set %Var.F1 3 | /f1
  408. n7=.-
  409. n8=.CTCP Protection
  410. n9=..High:/set %Var.F2 1 | /f2
  411. n10=..Normal:/set %Var.F2 2 | /f2
  412. n11=..Off:/set %Var.F2 3 | /f2
  413. n12=.Text Protection
  414. n13=..High:/set %Var.F3 1 | /f3
  415. n14=..Normal:/set %Var.F3 2 | /f3
  416. n15=..Off:/set %Var.F3 3 | /f3
  417. n16=.DCC Protection
  418. n17=..On:/set %Var.F4 1 | /f4
  419. n18=..Off:/set %Var.F4 2 | /f4
  420. n19=-
  421. n20=Talkers
  422. n21=.SMaLL CaSe:/leet $$?="Enter Text"
  423. n22=.UppEr cAsE:/upvowels $$?="Enter Text"
  424. n23=.Backdraws:/backwards $$?="Enter Text"
  425. n24=.rAndOmáCAPS:/rcaps $$?="Enter Text"
  426. n25=.*s*t*a*r*s*:/stars $$?="Enter Text"
  427. n26=.dEATHTalker:/kewltalk $$?="Enter Text"
  428. n27=.-
  429. n28=.dEATHCoder
  430. n29=..@ Coding:/codea $$?="Enter the text that will be coded"
  431. n30=..Θ Coding:/codee $$?="Enter the text that will be coded"
  432. n31=.dEATHUncoder
  433. n32=..@ Uncoding:/ucodema $$?="Enter the text that will be uncoded"
  434. n33=..Θ Uncoding:/ucodeme $$?="Enter the text that will be uncoded"
  435.  
  436. [lpopup]
  437. n0=X-cise's Homepage:/me is using 4 dEATH ThrustPACK 3.1 (⌐1997 By X-cise)... 4Download from : http://www.bordata.com.tr/ImaginE
  438. n1=-
  439. n2=DCC Stuff
  440. n3=.Send:/dcc send $$1
  441. n4=.Chat:/dcc chat $$1
  442. n5=.-
  443. n6=.Dcc Junk Chat:/raw PRIVMSG $$1 :DCC CHAT chat 3453536785 19 | /speak DCC Bridge Opened
  444. n7=.Fake DCC Send:/raw privmsg $$1 :DCC send $?="What file name?" 3353362454 19 $$?="How Many Bytes?" $+  | /speak DCC Bridge Opened
  445. n8=-
  446. n9=Friend/Enemy Control
  447. n10=.User List
  448. n11=..Protect List
  449. n12=...On:/set %Group.Protect On | echo 4 -a Protected User List 1 òOnò  4 (dEATH ThrustPACK 3.1)
  450. n13=...Off:/set %Group.Protect Off | echo 4 -a Protected User List 1 òOffò  4 (dEATH ThrustPACK 3.1)
  451. n14=..Auto Op List
  452. n15=...On:/set %Group.AutoOp On | echo 4 -a Auto Op List 1 òOnò  4 (dEATH ThrustPACK 3.1)
  453. n16=...Off:/set %Group.AutoOp Off | echo 4 -a Auto Op List 1 òOffò  4 (dEATH ThrustPACK 3.1)
  454. n17=..Shitlist
  455. n18=...On:/set %Group.AutoShit On | echo 4 -a Shitlist 1 òOnò  4 (dEATH ThrustPACK 3.1)
  456. n19=...Off:/set %Group.Auto.Shit Off| echo 4 -a Shitlist 1 òOffò  4 (dEATH ThrustPACK 3.1)
  457. n20=.-
  458. n21=.Protect Them
  459. n22=..Add (all channels): {
  460. n23=  set %Var.Temp $address($$1,3) | set %Var.Temp $readini $mircdir $+ documents\protected.ini %Var.Temp Channels
  461. n24=  if (%Var.Temp == *) { echo 6 # $$1 is already on the protected list for all channels. | halt }
  462. n25=  writeini $mircdir $+ documents\protected.ini $address($$1,3) Channels *
  463. n26=  echo 6 # Added $$1 to protected list (all channels). | .guser 85 $$1 3
  464. n27=}
  465. n28=..Add (¤t channel): {
  466. n29=  set %Var.Temp $address($$1,3) | set %Var.Temp $readini $mircdir $+ documents\protected.ini %Var.Temp Channels
  467. n30=  if (%Var.Temp == $null) {
  468. n31=    set %Var.Temp $addtok(%Var.Temp,#,32) | writeini $mircdir $+ documents\protected.ini $address($$1,3) Channels #
  469. n32=    echo 6 # Added $$1 to protected list ( $+ # $+ ). | .guser 85 $$1 3 | halt
  470. n33=  }
  471. n34=  if (%Var.Temp == *) {
  472. n35=    if ($yesno(Remove from all channels first) == 1) {
  473. n36=      writeini $mircdir $+ documents\protected.ini $address($$1,3) Channels #
  474. n37=      echo 6 # Added $$1 to protected list ( $+ # $+ ). | .guser 85 $$1 3 | halt
  475. n38=    } | else { halt }
  476. n39=  }
  477. n40=  if (# isin %Var.Temp) { echo 6 # $$1 is already on the protected list for # $+ . | halt }
  478. n41=  set %Var.Temp $addtok(%Var.Temp,#,32) | writeini $mircdir $+ documents\protected.ini $address($$1,3) Channels %Var.Temp
  479. n42=  echo 6 # Added $$1 to protected list ( $+ # $+ ). | .guser 85 $$1 3
  480. n43=}
  481. n44=..-
  482. n45=..Remove (all channels): {
  483. n46=  set %Var.Temp $address($$1,3) | set %Var.Temp $readini $mircdir $+ documents\protected.ini %Var.Temp Channels
  484. n47=  if (%Var.Temp == $null) { echo 6 # $$1 is not on the protected list for all channels. | halt }
  485. n48=  set %Var.Temp $address($$1,3) | remini $mircdir $+ documents\protected.ini %Var.Temp
  486. n49=  echo 6 # Removed $$1 from protected list (all channels). | .ruser 85 $$1 3
  487. n50=}
  488. n51=..Remove (current channel): {
  489. n52=  set %Var.Temp $address($$1,3) | set %Var.Temp $readini $mircdir $+ documents\protected.ini %Var.Temp Channels
  490. n53=  if (%Var.Temp == $null) { echo 6 # $$1 is not in the protected list for # $+ . | halt }
  491. n54=  if (%Var.Temp == *) {
  492. n55=    if ($yesno(Remove from all channels) == 1) {
  493. n56=      set %Var.Temp $address($$1,3) | remini $mircdir $+ documents\protected.ini %Var.Temp
  494. n57=      echo 6 # Removed $$1 from protected list (all channels). | .ruser 85 $$1 3 | halt
  495. n58=    } | else { halt }
  496. n59=  }
  497. n60=  if (%Var.Temp == #) {
  498. n61=    set %Var.Temp $address($$1,3) | remini $mircdir $+ documents\protected.ini %Var.Temp
  499. n62=    echo 6 # Removed $$1 from protected list (all channels). | .ruser 85 $$1 3 | halt
  500. n63=  }
  501. n64=  set %Var.Temp $remtok(%Var.Temp,#,32) | writeini $mircdir $+ documents\protected.ini $address($$1,3) Channels %Var.Temp
  502. n65=  echo 6 # Removed $$1 from the protected list ( $+ # $+ ). | .ruser 85 $$1 3
  503. n66=}
  504. n67=.Auto Op Them
  505. n68=..Add (all channels): {
  506. n69=  set %Var.Temp $address($$1,3) | set %Var.Temp $readini $mircdir $+ documents\autoop.ini %Var.Temp Channels
  507. n70=  if (%Var.Temp == *) { echo 6 # $$1 is already on the auto op list for all channels. | halt }
  508. n71=  writeini $mircdir $+ documents\autoop.ini $address($$1,3) Channels *
  509. n72=  echo 6 # Added $$1 to auto op list (all channels). | .guser 80 $$1 3
  510. n73=}
  511. n74=..Add (¤t channel): {
  512. n75=  set %Var.Temp $address($$1,3) | set %Var.Temp $readini $mircdir $+ documents\autoop.ini %Var.Temp Channels
  513. n76=  if (%Var.Temp == $null) {
  514. n77=    set %Var.Temp $addtok(%Var.Temp,#,32) | writeini $mircdir $+ documents\autoop.ini $address($$1,3) Channels #
  515. n78=    echo 6 # Added $$1 to auto op list ( $+ # $+ ). | .guser 80 $$1 3 | halt
  516. n79=  }
  517. n80=  if (%Var.Temp == *) {
  518. n81=    if ($yesno(Remove from all channels first) == 1) {
  519. n82=      writeini $mircdir $+ documents\autoop.ini $address($$1,3) Channels #
  520. n83=      echo 6 # Added $$1 to auto op list ( $+ # $+ ). | .guser 80 $$1 3 | halt
  521. n84=    } | else { halt }
  522. n85=  }
  523. n86=  if (# isin %Var.Temp) { echo 6 # $$1 is already on the auto op list for # $+ . | halt }
  524. n87=  set %Var.Temp $addtok(%Var.Temp,#,32) | writeini $mircdir $+ documents\autoop.ini $address($$1,3) Channels %Var.Temp
  525. n88=  echo 6 # Added $$1 to auto op list ( $+ # $+ ). | .guser 80 $$1 3
  526. n89=}
  527. n90=..-
  528. n91=..Remove (all channels): {
  529. n92=  set %Var.Temp $address($$1,3) | set %Var.Temp $readini $mircdir $+ documents\autoop.ini %Var.Temp Channels
  530. n93=  if (%Var.Temp == $null) { echo 6 # $$1 is not on the auto op list for all channels. | halt }
  531. n94=  set %Var.Temp $address($$1,3) | remini $mircdir $+ documents\autoop.ini %Var.Temp
  532. n95=  echo 6 # Removed $$1 from auto op list (all channels). | .ruser 80 $$1 3
  533. n96=}
  534. n97=..Remove (current channel): {
  535. n98=  set %Var.Temp $address($$1,3) | set %Var.Temp $readini $mircdir $+ documents\autoop.ini %Var.Temp Channels
  536. n99=  if (%Var.Temp == $null) { echo 6 # $$1 is not in the auto op list for # $+ . | halt }
  537. n100=  if (%Var.Temp == *) {
  538. n101=    if ($yesno(Remove from all channels) == 1) {
  539. n102=      set %Var.Temp $address($$1,3) | remini $mircdir $+ documents\autoop.ini %Var.Temp
  540. n103=      echo 6 # Removed $$1 from auto op list (all channels). | .ruser 80 $$1 3 | halt
  541. n104=    } | else { halt }
  542. n105=  }
  543. n106=  if (%Var.Temp == #) {
  544. n107=    set %Var.Temp $address($$1,3) | remini $mircdir $+ documents\autoop.ini %Var.Temp
  545. n108=    echo 6 # Removed $$1 from auto op list (all channels). | .ruser 80 $$1 3 | halt
  546. n109=  }
  547. n110=  set %Var.Temp $remtok(%Var.Temp,#,32) | writeini $mircdir $+ documents\autoop.ini $address($$1,3) Channels %Var.Temp
  548. n111=  echo 6 # Removed $$1 from the auto op list ( $+ # $+ ). | .ruser 80 $$1 3
  549. n112=}
  550. n113=.Shitlist Them
  551. n114=..Add Shitlist: {
  552. n115=  .guser -a 1 $$1 3 
  553. n116=  inc %Var.Victims
  554. n117=  if ($me isop #) { ban # $$1 2 | kick # $$1 Shitlisted }
  555. n118=  else { echo 6 Cannot Kick/Ban $$1 $+ ! You don't have ops! }
  556. n119=  echo 6 Added $$1 $+ : $address($$1,4) as an shitlisted user. Current Level: (1)
  557. n120=}
  558. n121=..Remove Shitlist: {
  559. n122=  .ruser 1 $$1 3 
  560. n123=  echo 6 Removed $$1 $+ : $address($$1,4) from shilist. Current Level (5)
  561. n124=}
  562. n125=..-
  563. n126=..Clear Shitlist: {
  564. n127=  .rlevel 1
  565. n128=  echo 6 Cleared all shitlisted users. 
  566. n129=}
  567. n130=-
  568. n131=Kicks/Bans
  569. n132=.Kick: {
  570. n133=  inc %Var.Victims
  571. n134=  kick # $$1 1You are the victim number12 %Var.Victims 1of $me !(dEATH
  572. n135=}
  573. n136=.Ban:/ban # $$1 3
  574. n137=.Kick/Ban:{
  575. n138=  inc %Var.Victims 
  576. n139=  ban # $$1 3 
  577. n140=  kick # $$1 1You are the victim number12 %Var.Victims 1of $me !(BANNED!
  578. n141=}
  579. n142=.Nick Change Kick: /nk $$1
  580. n143=.Nick Change Kick/Ban : /nk $$1 | /ban # $$1 3
  581. n144=.-
  582. n145=.Filter Kick:/fk -i 1 0 $address($$1,2)
  583. n146=.Filter Kick/Ban:/fk -i 1 1 $address($$1,2)
  584. n147=.-
  585. n148=.Reason Kick:{
  586. n149=  inc %Var.Victims 
  587. n150=  kick # $$* $$?="Enter Reason:"
  588. n151=}
  589. n152=.Reason Kick/Ban:{
  590. n153=  inc %Var.Victims 
  591. n154=  ban # $$* 3 
  592. n155=  kick # $$* $$?="Enter Reason:" 
  593. n156=}
  594. n157=.-
  595. n158=.Specific Bans
  596. n159=..Nick-User-Host-Domain:/ban # $$*
  597. n160=..User-Host-Domain:/ban # $$* 1
  598. n161=..User-Domain:/ban # $$* 3
  599. n162=..Host-Domain:/ban # $$* 2
  600. n163=..Domain:/ban # $$* 4
  601. n164=.-
  602. n165=.Timed Ban:{
  603. n166=  inc %Var.Victims 
  604. n167=  ban -u $+ $$?="Seconds For Ban" $$1 3 
  605. n168=  kick # $$1 Banned for: $$! Seconds! (dEATH 
  606. n169=}
  607. n170=Op Control
  608. n171=.Op User:/mode # +o $$1
  609. n172=.Deop User:/mode # -o $$1
  610. n173=Mass Utilities
  611. n174=.Mass Op: {
  612. n175=  set %i 1
  613. n176=  set %Var.Index 1
  614. n177=  unset %Var.Nicks
  615. n178=  unset %Var.Snick
  616. n179=  if (undernet isin $server) { set %Var.Num 6 }
  617. n180=  else { set %Var.Num 4 }
  618. n181=  :start
  619. n182=  if ($snick(%i,#) == $me) { inc %i 1 | goto start }
  620. n183=  set %Var.Snick $snick(%i,#)
  621. n184=  if (%Var.Snick == $null) { raw -q mode # +oooooo %Var.Nicks | unset %Var.Snick | unset %Var.Index | unset %Var.Nicks | unset %i | unset %Var.Num | halt }
  622. n185=  set %Var.Nicks %Var.Snick %Var.Nicks
  623. n186=  if (%Var.Snick != $me) { if (%Var.Index == %Var.Num) { raw -q mode # +oooooo %Var.Nicks | unset %Var.Nicks | set %Var.Index 1 | inc %i 1 | goto start } }
  624. n187=  inc %i 1 
  625. n188=  inc %Var.Index 1
  626. n189=  goto start
  627. n190=}
  628. n191=.Mass Deop: {
  629. n192=  set %i 1
  630. n193=  set %Var.Index 1
  631. n194=  unset %Var.Nicks
  632. n195=  unset %Var.Snick
  633. n196=  if (undernet isin $server) { set %Var.Num 6 }
  634. n197=  else { set %Var.Num 4 }
  635. n198=  :start
  636. n199=  if ($snick(%i,#) == $me) { inc %i 1 | goto start }
  637. n200=  set %Var.Snick $snick(%i,#)
  638. n201=  if (%Var.Snick == $null) { raw -q mode # -oooooo %Var.Nicks | unset %Var.Snick | unset %Var.Index | unset %Var.Nicks | unset %i | unset %Var.Num | halt }
  639. n202=  set %Var.Nicks %Var.Snick %Var.Nicks
  640. n203=  if (%Var.Snick != $me) { if (%Var.Index == %Var.Num) { raw -q mode # -oooooo %Var.Nicks | unset %Var.Nicks | set %Var.Index 1 | inc %i 1 | goto start } }
  641. n204=  inc %i 1 
  642. n205=  inc %Var.Index 1
  643. n206=  goto start
  644. n207=}
  645. n208=.Mass Voice: {
  646. n209=  set %i 1
  647. n210=  set %Var.Index 1
  648. n211=  unset %Var.Nicks
  649. n212=  unset %Var.Snick
  650. n213=  if (undernet isin $server) { set %Var.Num 6 }
  651. n214=  else { set %Var.Num 4 }
  652. n215=  :start
  653. n216=  set %Var.Snick $snick(%i,#)
  654. n217=  if (%Var.Snick == $null) { raw -q mode # +vvvvvv %Var.Nicks | unset %Var.Snick | unset %Var.Index | unset %Var.Nicks | unset %i | unset %Var.Num | halt }
  655. n218=  set %Var.Nicks %Var.Snick %Var.Nicks
  656. n219=  if (%Var.Index == %Var.Num) { raw -q mode # +vvvvvv %Var.Nicks | unset %Var.Nicks | set %Var.Index 1 | inc %i 1 | goto start } 
  657. n220=  inc %i 1 
  658. n221=  inc %Var.Index 1
  659. n222=  goto start
  660. n223=}
  661. n224=.Mass Devoice: {
  662. n225=  set %i 1
  663. n226=  set %Var.Index 1
  664. n227=  unset %Var.Nicks
  665. n228=  unset %Var.Snick
  666. n229=  if (undernet isin $server) { set %Var.Num 6 }
  667. n230=  else { set %Var.Num 4 }
  668. n231=  :start
  669. n232=  set %Var.Snick $snick(%i,#)
  670. n233=  if (%Var.Snick == $null) { raw -q mode # -vvvvvv %Var.Nicks | unset %Var.Snick | unset %Var.Index | unset %Var.Nicks | unset %i | unset %Var.Num | halt }
  671. n234=  set %Var.Nicks %Var.Snick %Var.Nicks
  672. n235=  if (%Var.Index == %Var.Num) { raw -q mode # -vvvvvv %Var.Nicks | unset %Var.Nicks | set %Var.Index 1 | inc %i 1 | goto start } 
  673. n236=  inc %i 1 
  674. n237=  inc %Var.Index 1
  675. n238=  goto start
  676. n239=}
  677. n240=.Mass Ban:/ban $$* 3
  678. n241=.Mass Kick: {
  679. n242=  set %i 1
  680. n243=  set %Var.Index 1
  681. n244=  :start
  682. n245=  set %Var.Nick $snick(%i,#)
  683. n246=  if (%Var.Nick == $null) { unset %i | unset %Var.Index | unset %Var.Nick | halt }
  684. n247=  if (%Var.Nick == $me) { inc %i 1 | goto start } 
  685. n248=  inc %Var.Victims 
  686. n249=  kick # %Var.Nick Mass Consequitive Wh0re Kick! Wh0re Number: %Var.Index
  687. n250=  inc %i 1 | inc %Var.Index 1
  688. n251=  goto start
  689. n252=}
  690. n253=.Mass Invite:/invite $$* $$?="Enter the channel that you wish to invite them too"
  691. n254=.Mass Notice:/notice $$* $$?="Enter your notice"
  692. n255=.Mass Msg:/msg $$* $$?="Enter your msg"
  693. n256=.NickMDeop:/nick _ $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) | /mode # -oooo $$1 $2 $3 $4 | /nick _ $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) | /mode # -oooo $5 $6 $7 $8 | /nick _ $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) | /mode # -oooo $9 $10 $11 $12 | /nick _ $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) | /mode # -oooo $13 $14 $15 $16
  694. n257=-
  695. n258=Nick Registration (if available)
  696. n259=.Setup Protection
  697. n260=..Setup All:/sall
  698. n261=..-
  699. n262=..Nick of Bot:/nickbot
  700. n263=..Prot. nick:/protnick
  701. n264=..Password:/passw
  702. n265=..-
  703. n266=..Delete My Prot:/delprot
  704. n267=.-
  705. n268=.Register Me:/register_me
  706. n269=.-
  707. n270=.Recover My Nick:/recovern
  708. n271=.Release My Nick:/releasen
  709. n272=.-
  710. n273=.Identify:/ident
  711. [bpopup]
  712. n0=dEATH ThrustPACK 3
  713. n1=X-cise's Homepage:/me is using 4 dEATH ThrustPACK 3.1 (⌐1997 By X-cise)... 4Download from : http://www.bordata.com.tr/ImaginE
  714. n2=-
  715. n3=dEATHFlood Protection
  716. n4=.All Protection
  717. n5=..High:/set %Var.F1 1 | /f1
  718. n6=..Normal:/set %Var.F1 2 | /f1
  719. n7=..Off:/set %Var.F1 3 | /f1
  720. n8=.-
  721. n9=.CTCP Protection
  722. n10=..High:/set %Var.F2 1 | /f2
  723. n11=..Normal:/set %Var.F2 2 | /f2
  724. n12=..Off:/set %Var.F2 3 | /f2
  725. n13=.Text Protection
  726. n14=..High:/set %Var.F3 1 | /f3
  727. n15=..Normal:/set %Var.F3 2 | /f3
  728. n16=..Off:/set %Var.F3 3 | /f3
  729. n17=.DCC Protection
  730. n18=..On:/set %Var.F4 1 | /f4
  731. n19=..Off:/set %Var.F4 2 | /f4
  732. n20=-
  733. n21=COMMANDERS
  734. n22=.CHANNEL MODE COMMANDER
  735. n23=..Set optional modes and topic:/topic # $$?="Enter your topic here:" | /mode # + $$?="Enter your modes here (TNPSIM):"
  736. n24=..Private
  737. n25=...On:/mode # +p
  738. n26=...Off:/mode # -p
  739. n27=..Invite only
  740. n28=...On:/mode # +i
  741. n29=...Off:/mode # -i
  742. n30=..Moderated
  743. n31=...On:/mode # +m
  744. n32=...Off:/mode # -m
  745. n33=..Secret
  746. n34=...On:/mode # +s
  747. n35=...Off:/mode # -s
  748. n36=..Limit numbers
  749. n37=...On:/mode # +l $$?="Enter number of users allowed:"
  750. n38=...Off:/mode # -l
  751. n39=..Key protection
  752. n40=...On:/mode # +k $$?="Enter channel key:"
  753. n41=...Off:/mode # -k $$?="Enter key to remove:"
  754. n42=..Prevent topic changes for non-ops
  755. n43=...On:/mode # +t
  756. n44=...Off:/mode # -t
  757. n45=..Prevent external messages
  758. n46=...On:/mode # +n
  759. n47=...Off:/mode # -n
  760. n48=.YOUR MODE COMMANDER
  761. n49=..Server Notices
  762. n50=...On:/mode $me +s | /speak Done Sir
  763. n51=...Off:/mode $me -s | /speak Done Sir
  764. n52=..Invisibility
  765. n53=...On:/mode $me +i | /speak Done Sir
  766. n54=...Off:/mode $me -i | /speak Done Sir
  767. n55=..Wallops
  768. n56=...On:/mode $me +w | /speak Done Sir
  769. n57=...Off:/mode $me -w | /speak Done Sir
  770. n58=-
  771. n59=Fake ChanJoin:/join $$?="What channel?" $+ á $+
  772. n60=About IRCServer
  773. n61=.MOTD:/motd
  774. n62=.Lusers:/lusers
  775. n63=.IRCops:/stats o
  776. n64=.Admin:/admin
  777. n65=.K-Lines:/stats k
  778. n66=.G-Lines:/stats g
  779. n67=Direct Channel Link
  780. n68=.Open Link:/enable #linkchan | set %1 $$?="Enter Channel Number 1:" | set %2 $$?="Enter Channel Number 2:" | if (($me !ison %2) || ($me !ison %1)) { echo You must be on both channels. | halt } | describe %1 $+ , $+ %2   is opening an dEATH Direct Link between the following channels:  $+ %1 and %2 $+   4You can now talk to each other!
  781. n69=.Kill Link:/disable #linkchan | /describe %1 $+ , $+ %2 is closing the dEATH Direct Link bettween these channels:   $+ %1 and %2 $+  | /unset %1 | /unset %2
  782. n70=-
  783. n71=dEATH Add-Ins
  784. n72=.Flash The Adress:/run $mircdiraddins\flash.exe $$?="Flash who?   (user@host)" $$?="Modes:(1)basic (2)zmodem (3)killer" | /splay $mircdir $+ wavs\AddIns1.wav
  785. n73=.Kaboom!:/run $mircdiraddins\kaboom!3.exe | /splay $mircdir $+ wavs\addins1.wav
  786. n74=.Nuke'eM (Port139):/run $mircdiraddins\nuke'em.exe | /splay $mircdir $+ wavs\addins1.wav
  787. n75=.-
  788. n76=.dEATHMail:/run $mircdiraddins\deathmail.exe | /splay $mircdir $+ wavs\addins1.wav
  789. n77=-
  790. n78=XDCC Files
  791. n79=.Turn On {
  792. n80=  set %Group.XDCC On | echo 4 -a XDCC Offering 1 òOnò  4 (dEATH)
  793. n81=  %Var.XXXX = $$?="Do you want to advertise ? ( Y / N )"
  794. n82=  if (%Var.XXXX == Y) { set %XDCC.Advertise Yes | .timer997 0 $$?="Every how many seconds?" /amsg  òòòXDCC OPENòòò  /ctcp $me XDCC HELP  òòòXDCC OPENòòò  | amsg òòòXDCC OPENòòò  /ctcp $me XDCC HELP  òòòXDCC OPENòòò | halt } | set %XDCC.Advertise 0
  795. n83=}
  796. n84=.Turn Off {
  797. n85=  set %Group.XDCC Off | echo 4 -a XDCC Offering 1 òOffò  4 (dEATH)
  798. n86=  if (%XDCC.Advertise == Yes) { .timer997 off | /amsg òòòXDCC CLOSEDòòò } | unset %XDCC.*
  799. n87=}
  800. n88=.-
  801. n89=.Setup XDCC {
  802. n90=  set %Var.Index 1
  803. n91=  :read
  804. n92=  set %Var.Temp $readini $mircdir $+ documents\xdcc.ini [ Packet [ $+ [ %Var.Index ] ] ] [ file [ $+ [ %Var.Index ] ] ]
  805. n93=  if (%Var.Temp == $null) { echo 2 -a Adding new packet %Var.Index $+ ... | goto add }
  806. n94=  else {
  807. n95=    set %Var.Temp $readini $mircdir $+ documents\xdcc.ini [ Packet [ $+ [ %Var.Index ] ] ] [ file [ $+ [ %Var.Index ] ] ]
  808. n96=    echo 6 -a Packet %Var.Index
  809. n97=    echo 2 -a File: %Var.Temp
  810. n98=    set %Var.Temp $readini $mircdir $+ documents\xdcc.ini [ Packet [ $+ [ %Var.Index ] ] ] [ desc [ $+ [ %Var.Index ] ] ]
  811. n99=    echo 2 -a Description: %Var.Temp
  812. n100=    goto add
  813. n101=  }
  814. n102=  :add
  815. n103=  set %Var.Temp $dir="XDCC packet %Var.Index file(s):" *.*
  816. n104=  if (%Var.Temp != $null) { writeini $mircdir $+ documents\xdcc.ini [ Packet [ $+ [ %Var.Index ] ] ] [ file [ $+ [ %Var.Index %Var.Temp ] ] ] }
  817. n105=  set %Var.Temp $$?="Description for packet('clear' to remove file):"
  818. n106=  if ($upper(%Var.Temp) == CLEAR) { goto clear }
  819. n107=  if (%Var.Temp == $null) { goto done }
  820. n108=  if (%Var.Temp != $null) { writeini $mircdir $+ documents\xdcc.ini [ Packet [ $+ [ %Var.Index ] ] ] [ desc [ $+ [ %Var.Index %Var.Temp ] ] ] }
  821. n109=  echo 6 -s Added packet %Var.Index $+ ... | inc %Var.Index | goto read
  822. n110=  :clear
  823. n111=  remini $mircdir $+ documents\xdcc.ini Packet $+ %Var.Index
  824. n112=  echo 2 -a Cleared packet %Var.Index $+ ... | goto read
  825. n113=  :done
  826. n114=}
  827. n115=.List Files {
  828. n116=  echo 6 -a Now listing all avaliable packets... | set %Var.Index 1
  829. n117=  :read
  830. n118=  set %Var.Temp $readini $mircdir $+ documents\xdcc.ini [ Packet [ $+ [ %Var.Index ] ] ] [ file [ $+ [ %Var.Index ] ] ]
  831. n119=  if (%Var.Temp == $null) { goto done }
  832. n120=  set %Var.Temp $readini $mircdir $+ documents\xdcc.ini [ Packet [ $+ [ %Var.Index ] ] ] [ desc [ $+ [ %Var.Index ] ] ] (
  833. n121=  %Var.Temp = [ %Var.Temp ] $readini $mircdir $+ documents\xdcc.ini [ Packet [ $+ [ %Var.Index ] ] ] [ file [ $+ [ %Var.Index ] ] ] )
  834. n122=  echo 2 -a %Var.Index $+ . %Var.Temp | inc %Var.Index | goto read
  835. n123=  :done
  836. n124=  dec %Var.Index | echo 6 -a End of list! Total: %Var.Index
  837. n125=}
  838. n126=-
  839. n127=Nick Registration (if available)
  840. n128=.Setup Protection
  841. n129=..Setup All:/sall
  842. n130=..-
  843. n131=..Nick of Bot:/nickbot
  844. n132=..Prot. nick:/protnick
  845. n133=..Password:/passw
  846. n134=..-
  847. n135=..Delete My Prot:/delprot
  848. n136=.-
  849. n137=.Register Me:/register_me
  850. n138=.-
  851. n139=.Recover My Nick:/recovern
  852. n140=.Release My Nick:/releasen
  853. n141=.-
  854. n142=.Identify:/ident
  855.